home *** CD-ROM | disk | FTP | other *** search
/ Designer's Club 1996 August / Designer's Club 1996 August.iso / pc / ideasrc / vortex.dir / 00091.ls < prev    next >
Encoding:
Text File  |  1996-07-09  |  611 b   |  31 lines

  1. on keyDown
  2.   if the key = 1 then
  3.     set the soundLevel to 1
  4.   end if
  5.   if the key = 2 then
  6.     set the soundLevel to 2
  7.   end if
  8.   if the key = 3 then
  9.     set the soundLevel to 3
  10.   end if
  11.   if the key = 4 then
  12.     set the soundLevel to 4
  13.   end if
  14.   if the key = 5 then
  15.     set the soundLevel to 5
  16.   end if
  17.   if the key = 6 then
  18.     set the soundLevel to 6
  19.   end if
  20.   if the key = 7 then
  21.     set the soundLevel to 7
  22.   end if
  23.   if the key = "W" then
  24.     if the volume of sound 2 = 0 then
  25.       set the volume of sound 2 to the soundLevel * 36
  26.     else
  27.       set the volume of sound 2 to 0
  28.     end if
  29.   end if
  30. end
  31.